// This file was decompiled using SASCM.ini published on 2020-11-11
{$CLEO .CS}

03A4: script_name "DEVDRAFFBUY" 

:DEVDRAFFBUY_9
0001: wait 0 ms 
00D6: if and
0256:   player 0 defined 
0ADC:   test_cheat "DEVILDRAGONFFBUY" 
004D: jump_if_false @DEVDRAFFBUY_9 
00D6: if 
010A:   player $PLAYER_CHAR money > 11999 
004D: jump_if_false @DEVDRAFFBUY_285 
0001: wait 0 ms 
0208: 3@ = random_float_in_ranges -7.0 10.0 
0208: 4@ = random_float_in_ranges -10.0 7.0 
04C4: store_coords_to $X $Y $Z from_actor $PLAYER_ACTOR with_offset 3@ 4@ -1.0 
0107: $OBJECAT = create_object 1224 at $X $Y $Z 
0382: set_object $OBJECAT collision_detection 1 
0400: store_coords_to $X2 $Y2 $Z2 from_object $OBJECAT with_offset 0.0 0.0 0.0 
0213: $DEVDRAFFAR = create_pickup 12469 type 3 at $X2 $Y2 $Z2 
03DC: $DEVDRAFFARM = create_marker_above_pickup $DEVDRAFFAR 

:DEVDRAFFBUY_195
0001: wait 0 ms 
00D6: if 
0214:   pickup $DEVDRAFFAR picked_up 
004D: jump_if_false @DEVDRAFFBUY_195 
0002: jump @DEVDRAFFBUY_222 

:DEVDRAFFBUY_222
0247: load_model 12469 
038B: load_requested_models 
0001: wait 0 ms 
00D6: if 
0248:   model 12469 available 
004D: jump_if_false @DEVDRAFFBUY_222 
01B2: give_actor $PLAYER_ACTOR weapon 139 ammo 120 // Load the weapon model before using this 
0002: jump @DEVDRAFFBUY_266 

:DEVDRAFFBUY_266
0001: wait 0 ms 
0109: player $PLAYER_CHAR money += -12000 
01C4: remove_references_to_object $OBJECAT // This object will now disappear when the player looks away
0002: jump @DEVDRAFFBUY_9 

:DEVDRAFFBUY_285
0001: wait 0 ms 
0512: show_permanent_text_box 'NOMONEY' 
0001: wait 2000 ms 
03E6: remove_text_box 
0002: jump @DEVDRAFFBUY_9